home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / doom / turric03.zip / TURRIC03.ZIP / PROGS / EATGIBS.QC < prev    next >
Text File  |  1997-01-08  |  1KB  |  63 lines
  1. /*
  2. ==============================================================================
  3.  
  4. EAT GIBBS
  5.  
  6. ==============================================================================
  7. */
  8.  
  9. void() EatGibs =
  10. {
  11. // only a player can pick it up
  12.     if (other.classname != "player")
  13.         return;
  14.     if (other.health <= 0)
  15.         return;
  16. // only eat gibs if desparate
  17. //** PATCH_BEGIN - morph2 - Turrican ****
  18.     if (other.health >= 50 * other.health_modifier)
  19.         return;
  20. //** PATCH_END - morph2 - Turrican ******
  21.  
  22. // heal a random amount of 10% health
  23.     if (!T_Heal(other, random() * 10, 0))
  24.         return;
  25.  
  26.     sprint(other, "You ate a gib\n");
  27.  
  28. // gibs touch sound
  29.     sound(other, CHAN_ITEM, "zombie/z_miss.wav", 1, ATTN_NORM);
  30.  
  31.     stuffcmd (other, "bf\n");
  32.  
  33.     remove (self);
  34.  
  35. };
  36.  
  37. void() EatHead =
  38. {
  39. // only a player can pick it up
  40.     if (other.classname != "player")
  41.         return;
  42.     if (other.health <= 0)
  43.         return;
  44. // only eat head if desparate
  45. //** PATCH_BEGIN - morph2 - Turrican ****
  46.     if (other.health >= 50 * other.health_modifier)
  47.         return;
  48. //** PATCH_END - morph2 - Turrican ******
  49.  
  50. // heal 15%
  51.     if (!T_Heal(other, 15, 0))
  52.         return;
  53.  
  54.     sprint(other, "You ate a head\n");
  55.  
  56. // head touch sound
  57.     sound(other, CHAN_ITEM, "demon/dhit2.wav", 1, ATTN_NORM);
  58.  
  59.     stuffcmd (other, "bf\n");
  60.  
  61.     remove (self);
  62.  
  63. };